# --- L-System Parser/Mutator --- Lj Lapre ----------------------------------
8
30
40
#
c(12)A
#
A=aaSaaSaaSaaSaaSaaSaaSaaSaaSaaB
S='(.9)!(.9)
a=tF[&'(.8)!LBL|zL]>(137)[z&'(.7)!LBL|zL]>(137)
B=tFL[-'(.8)!(.9)$LCL|zL]'(.9)!(.9)C
C=tFL[+'(.8)!(.9)$LBL|zL]'(.9)!(.9)B
#
L=[~c(8){+(30)f(20)-(120)f(20)-(120)f(20)}]
@
